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LLL II] BB BBB RRR RRR TTT LLL LI 
LLL 11] BBB BBB RRR RRR TTT LLL | Ll 
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LLL III ERB BBB RRR RRR TTT LLL Ll 
LLL Ill BSB BB RRR RRR TTT LLL Ll 
LLELLLLLLLLLLLLL IIIIIIIII BBBBBBBBBBBB RRR RRR TTT LELLLLLLLLLLLLL Ll 
LLELLLLLLLLLLLLL TITIII111 BBBBBBBBBBBB RRR RRR TTT LI 
LLELLLLLLLLLLLLL LIIIIIII BBBBBBBBBBBB RRR RRR TTT LELLLLLLLLLLLLL 
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T /1-001/ File: [18s GSTO.MAR EDIT: FM1001 


: 
SRR ARETA KEKE TAKE EARAR AERA AAARAARARERERAAAAAKEAEEHHAAKeReeeRiaeeeeeeeeeReeeees 


COPYRIGHT (c) 1978, 1980, 1982, 1984 B 
DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


OFTWARE IS ight oe UNDER A LICENSE AND MAY BE ye? AND corres 
N_ ACCORDANCE WITH THE TERMS OF SUCH LICENSE oe * + ah THE 
I RE OR oT 
p 


DOQDQOOOVOCOOOOCOO 
pole leololelololololo) 


Sooooooooooooocoooo 


OF THE ABOVE COPYRIGHT NOTICE. coat SF TWA 


Menon <wm 


THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
ooRPORAT ion NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 


DIGITAL ASSUMES NO RESPONSIB 


IBILIT 
SOFTWARE ON EQUIPMENT WHICH IS 


Y FOR THE USE OR RELIABILITY OF ITS 
NOT SUPPLIED BY DIGITAL. 


eee «%- . . . 
eeeeeeeeeeeeeeeeeens 
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++ 
FACILITY: Common Run-time Library. 


AUTHOR: 
FAROKH MORSHED 22-APR-83 VMS V3B 


; MODIFIED BY: 


: 
. 
; 
‘ 
‘ 
: 
4 
; 
4 
; 
Py 
. 
; 
° 
. 
; 
Py 
° 
° 
. 
: 
° 
. 
: 
? 
; 
° 
; 
‘ 
Py 
. 
: 
hats 


: PSECT DEFINITION 
.PSECT _LIBSCODE PIC, SHR, LONG, NOWRT 


0000 


> MACRO LIBRARY CALLS 


SCHF DEF 


Condition Handling arglst offsets 
SSTSDEF 


Status code fields 


EXTERNAL REFERENCES 


oOooco 
SOQOOQOCOCOCOOCOSOOCOCOOSSOOCOSSSSOSSSOOSCOOOCOOOOOOOCOOCOOOCOOOOOOOOO SOO 
PUPPIES BS BS BB BE EAN WII NNW IAI DIPIPIPONONPONONYPY 2 SS OS OS OS 
NOUS WN 2 O OO NAME WN O OD NAUE WN | O ODN UE WN CO OONOAUE WH OOONOUS Wh 


SOOoOooQooooocDooooQooooooooooooooooooOoOoOOOOCOOOOOOO 


SOOoooooooooooooooooooooooooosoo 
SOOoooooooooooooooooooooooooosooeo 


-DSABL GBL 

~ EXTERNAL LIBS$_INVARG ; We return this error condition 
: rr gf aie condition code is 

EXTERNAL SS$_UNWIND : Unutnd condition code 

EXTERNAL SS$_NORMAL ; Successful completion status 
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-SBTTL Change a signal to a stop 


++ 

FUNCTIONAL DESCRIPTION: 
This routine sets the stop bit associated with the exception whose 
mechanism argument is passed. The mechanism argument address is used 
in a ‘‘dead reckon'’ fashion to find the flag longword. The signal 
argument address is used to set the severity of the condition to 


against any other condition code (this is to avoid the overhead of 
calling LIBSMATCH_COND). 


COOOCoCooooooooooooo 


pelelelololeleleoleoleoleoleloloelolol oa) 


; CALLING SEQUENCE: 


: FORMAL PARAMETERS: 
: SIGARGS 


59 
800 él 
0 86 
0 6 
0 64 
0 65 
0 66 
0 67 
0 68 
0 69 
: 70 
71 
0 ie 
00 7 
00 74 
00 75 
44 8 
9009 v LIBSSIG_TO_STOP (SIGARGS.mr.r, MCHARGS.rr.r) 
0000 79 
0000 80 The signal's signal argument 
st + MCHARGS The signal's mechanism argument 
0000 HE IMPLICIT INPUTS: 
0000 84 NONE 
0000 S? 
0000 6 ; IMPLICIT OUTPUTS: 
0000 87 NONE 
0000 88 
0000 89 ; COMPLETION CODES: 
0000 90 NORMAL ; Success 
44 4 LIBS_INVARG : The condition code is SS$_UNWIND 
$000 38 ; SIDE EFFECTS: 
0000 94 
0000 95 :-- 
0000 96 
00000014 sh 97 MCHARGS_TO_FLAGS_OFFSET = 20 ; Dead reckon offset to flag 
00000001 00 98 V_STOP_BIT = : Position of stop bit 
sie ale: 000 99 M_STOP-BIT = 1aV_STOP_BIT ; Mask for stop bit 
0000000 000 100 V-SIGNAL_BIT = 3 Pos of signal bit 
00000001 44 13) M_SIGNAL_BIT = 18€V_SIGNAL_BIT ; Mask for signal bit 
090 108 unuino_nsc; 
00000000° be Ie -LONG SS$_UNWIND@-STSSS_SEVERITY; The message portion of SS$_UNWIND 
0000 094 196 -ENTRY LIBSSIG_TO_STOP, “M<> 
50 04 AC 00 4 135 MOVL CHFSL_SIGARGLST(AP), RO 3; RO <= SIGARGS 
0D 03 €E€D QOOA 110 CMPZV #STSSV_MSG_NO, #STS$S_MSG_NO,- 
EF AF 04 AO 0D 111 CHFSL_SIG_RAME(RO), UNWIND_MSG ; SS$_UNWIND? 
36 i 6 BEQL 10$ 3 Yes. 
00 04 F0 13 114 INSV #STSSK_SEVERE, #STSSV_SEVERITY,- ; 
04 A0 03 016 115 #STSSS~SEVERITY,CHFSL-SIG_NAME(RO); Set severity to severe 


16 
agers eee NEREEISEL QOD UMMM. SHES BBeRfonnsn 8 


18 00 08 BB 


14 A0 01 BA 


MOVL CHF SL_MCHARGLST(AP) <= MCHARGS 
BISB2 #M_STOP_BIT, MCHARGS_ . FLAGS ot SET cho» MA 
stop 


Set 
BICB2 #M_SIGNAL_BIT, MCHARGS_TO_FLAGS BrP SET ERO) 
; Clear + bit 


50 ecccneedl dO MOVL $538 NORMAL, RO ; Success 
7 108: BRB 203 : and return 
50 00000000'8F 00 i: MOVL § #LIBS_INVARG, RO : Condition code is SS$_UNWIND 
"RET : 


bd 8 8s 4 2 4) 8 ts a ts 


Rororororonororononn 


QCOoMmUMIMOUIN— 9 O/”] 
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oOo — 

~ alk 
SOCOCO 
WWNGrorororororonn ] = 


END 
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Symbol table : ° . ae 7 90: 4); 3 LIBRTL.SR REILIBSIGSTO.MAR: 1 — (2) 
CHF SL_MCHARGLST = 8 
CHFSL-SIGARGLST = 4 
CHFSL-SIG_NAME = 4 
Liessts 10 STOP 4 RG 4 
LIB eeereeee x 1 
RCHARGS, 10 FLAGS_OF FSET = 14 
M_SIGNAC BIT = 4 
“-STOP MATT = 2 
SS$_NORMAL eeneeeee =X 01 
SS$_UNWIND eeeeneee =X 8 01 
STSSK_SEVERE = 000 4 
STS$S_MSG_NO = 
STS$S =SEVERITY 2 ; 
STS$V_M Ss 
STS$V “SEVERITY = 0 
UNWIND _ 9444 a 01 
v NSIONAL BIT = 0000000 
v~STOP_BIT = 00000001 

Sena sn ener oeaen eae ee 

: Psect synopsis : 
PSECT name Allocation PSECT No. Attributes 
- ABS. 00000000 ( 9.) yf 9. ; = USR CON ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
LIBSCODE 00000036 ( 54.) of PIC USR ome REL LCL SHR EXE RD NOWRT NOVEC LONG 
SABS$ 00000000 < 0.) 02 ¢ 3°} NOPIC USR CON ABS LCL NOSHR EXE RD WRT NOVEC BYTE 

$ eer eor ere mec ew esc ene ecm neens 
: ; Performance indicators ! 

Phase Page faults CPU Time Elapsed Time 
Initialization 29 00:00:00.8? 00:00:01.46 
Sydiewe. 135 BR:88:8R"95 HEEB 
Sy beets SBS Bt 
Symbol table output 3 0:00:00.01 00:00:00-01 
Psect synopsis output 0:00: 3-8 0:00:00.02 
Cross-reference output 8 8 h8! 0.0 i BD 
Assembler run totals o Ft 0:00:01.41 0:00:13.7 


The working er Limit was 900 pages. 
4250 bytes ‘ pages) of virtual memory were used to buffer the intermediate code. 
Tnere were 10 pages of symbol table space otiocas o hold 55 non-local and 2 local symbols. 


129 source (ines were read in Pass 1, produci ng Tob lect records in Pass 
¥ pages of virtual memory were used to define & macros. 
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osyi Macro Run Statistics : s ° 


poset een eee ene mares ee= -scceh 


! Macro Library statistics ! 


ewer eees sec meecennaesaccnereen$ 


Macro Library name Macros defined 
-8255S0UA28: CSYSLIBISTARLET.MLB; 2 5 
108 GETS were required to define 5 macros. 


There were no errors, warnings or information messages. 
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